function u=crossover_bin(pop,Dim,CR,v)
        u=pop;
        dim_rand=unidrnd(Dim);
        real_number=rand(1,Dim);
        index_cross=find(real_number<=CR);
        if ~ismember(dim_rand,index_cross)
            u(dim_rand)=v(dim_rand);
        end
        u(index_cross)=v(index_cross);
end
